for i := 1 to |Regions| by 1
dev_display (Yanse)
dev_display (Classes)
disp_message (WindowHandle,'请选择 ' Regions[i-1] '色 区域', 'window', 12, 12, 'black', 'true')
draw_rectangle1 (WindowHandle, Row1, Column1, Row2, Column2)
gen_rectangle1 (Rectangle, Row1, Column1, Row2, Column2)
concat_obj (Rectangle, Classes, Classes)
endfor
create_class_mlp (3, 7, 5, 'softmax', 'normalization', 3, 42, MLPHandle)
add_samples_image_class_mlp (Yanse, Classes, MLPHandle)
disp_message (WindowHandle, '开始训练模型', 'window', 12, 12, 'black', 'true')
train_class_mlp (MLPHandle, 400, 0.5, 0.01, Error, ErrorLog)
评论